home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Utilities / Workspace / PackageInspector0.95 / Source / listbom < prev    next >
Text File  |  1995-07-30  |  1KB  |  56 lines

  1. #! /bin/sh
  2. #+++
  3. #  RCS listbom,v 1.1 1995/07/30 23:00:11 tom Exp
  4. #  title:    listbom
  5. #  abstract:    List contents of *.bom, for PackageInspector.
  6. #  author:    T.R.Hageman
  7. #  created:    July 1995
  8. #  modified:    (see RCS Log at end)
  9. #  copyleft:
  10. #
  11. #        Copyright (C) 1995  Tom R. Hageman.
  12. #
  13. #    This is free software; you can redistribute it and/or modify
  14. #    it under the terms of the GNU General Public License as published by
  15. #    the Free Software Foundation; either version 2 of the License, or
  16. #    (at your option) any later version.
  17. #
  18. #    This software is distributed in the hope that it will be useful,
  19. #    but WITHOUT ANY WARRANTY; without even the implied warranty of
  20. #    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21. #    GNU General Public License for more details.
  22. #
  23. #    You should have received a copy of the GNU General Public License
  24. #    along with this software; if not, write to the Free Software
  25. #    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  26. #
  27. #  description:
  28. #
  29. #    This script is not yet part of PackageInspector,
  30. #    but will be (sometime...)
  31. #
  32. #  TODO:
  33. #    Devise smart output format to limit line length.
  34. #    Build the supporting machinery in PackageInspector itself.
  35. #---
  36.  
  37.  
  38. bom="$1"
  39. lsbom='/usr/etc/lsbom'
  40.  
  41. [ -n "$bom" ] || { exit 1; }
  42.  
  43. case "`file $bom`" in
  44. *Cannot\ stat )
  45.     ;;
  46. *data )
  47.     [ -r $lsbom ] && exec $lsbom -f -l $bom
  48.     ;;
  49. *text )
  50.     exec cat $bom
  51.     ;;
  52. esac | sed 's|^\./||' | awk '{
  53.     printf("%6d\t%s\n", $4, $1)
  54. }'
  55.